Ty = Sequence(Segment[(0, t, -0.1), (0, t, 0.1)], t, 1, 6)
Tx = Sequence(Segment[(t, 0, -0.1), (t, 0, 0.1)], t, 1, 6)
Tz = Sequence(Segment[(0, -0.1, t), (0, 0.1, t)], t, 1, 6)
w = Vector((0, 0, 0), (0, 0, 7))
Kx = Sequence(Text[n, (n, 0)], n, 1, 6)
Ky = Sequence(Text[n, (0, n)], n, 1, 6)
x_1 = 5 (slider from -5 to 6, step 1)
y_1 = 3 (slider from -5 to 6, step 1)
z_1 = 1 (slider from -5 to 6, step 1)
x_2 = 1 (slider from -5 to 6, step 1)
y_2 = 3 (slider from -5 to 6, step 1)
z_2 = 1 (slider from -5 to 6, step 1)
v_1 = Vector((0, -2, 0), (0, 7, 0))
u_1 = Vector((-2, 0, 0), (7, 0, 0))
U: (x_1, y_1, z_1)
V: (x_2, y_2, z_2)
A = (0, 0, 0)
u = Vector(A, U)
v = Vector(A, V)
Vektorprodukt: u ⊗ v
s: u + v
S: (x(s), y(s), z(s))
a, a_2, a_3, a_4, a_5 = Polygon(A, U, S, V)
Vektorprodukt_1 = LaTeX(Vektorprodukt, true, true)